//FUNCAO_FORMATAR_HORAS

String formata_hora(int minutos){

int horas =0, min = 0;

String aux;

for(min = minutos; min>59; min-= 60)

{

horas++;

}

aux = IntToStr(horas);

aux+= ":" ;

aux+= IntToStr(min).Length()==2?IntToStr(min): "0" + IntToStr(min);

return aux;

}